home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 12 / Cream of the Crop 12 (Part II) / Cream of the Crop 12 (Part II).iso / OS2 / TAFELD08.ZIP / install.cmd < prev    next >
Encoding:
Text File  |  1996-03-04  |  956 b   |  40 lines
  1. /* Install TafelEd/2 */
  2.  
  3. call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs';
  4. Call SysloadFuncs;
  5.  
  6. /* Query for installation path */
  7.  
  8. curdir = directory();
  9.  
  10. Say 'Enter the directory you which to install TafelEd/2 into (C:\TafelEd)';
  11. Pull instdir;
  12.  
  13. newdir = directory(instdir);
  14. if newdir <> instdir Then Do
  15.     rc = SysMkDir(instdir);
  16.     If rc > 0 Then Do
  17.         Say 'Couldnt create the selected directory - 'instdir;
  18.         Exit;
  19.     End;    
  20. End;
  21. newdir = directory(instdir);
  22.  
  23. /* Copy the files to this directory */
  24. Say 'Copying the files';
  25. '@COPY 'curdir'\*.*'
  26.  
  27. /* Create an object on the Desktop */
  28.  
  29. say 'Creating TafelEd/2 program object';
  30. title = 'TafelEd/2';
  31. classname = 'WPProgram';
  32. location = '<WP_DESKTOP>';
  33. setup = 'EXENAME='instdir'\TAFELED.EXE;STARTUPDIR='instdir';ASSOCFILTER=*.TT';
  34. call SysCreateObject classname,title,location,setup,u;
  35.  
  36. /* Completed */
  37.  
  38. newdir = directory(curdir);
  39. say 'Done';
  40.